home *** CD-ROM | disk | FTP | other *** search
/ Chip 1996 October / CHIP 1996 oktober (CD08).zip / CHIP_CD08.BIN / szamla95 / disk1 / m_szla.tx_ / m_szla.bin
Text File  |  1996-07-09  |  5KB  |  245 lines
  1. &&**********************************************
  2. && Deklarßci≤s rΘszek
  3. &&**********************************************
  4. >DEFINITION;
  5.  
  6. &&--------------------------------
  7. && Oldal Beßllφtßsok
  8. &&--------------------------------
  9. PAGE;10;10;10;10;0;275;250;
  10.  
  11. &&--------------------------------
  12. && Header Θs Footer Beßllφtßsok
  13. &&--------------------------------
  14. HEADER;2;
  15. FOOTER;3;
  16.  
  17. &&--------------------------------
  18. &&Fontbeßllφtßsok
  19. &&--------------------------------
  20. FONT;01; Kimutatßs neve ; ARIAL;24;T;F;
  21. FONT;02; CΘgnΘv         ; TIMES NEW ROMAN;14;T;F;
  22. FONT;03; CΘgadat kiφrßs ; TIMES NEW ROMAN;09;F;F;
  23. FONT;04; Vev⌡ kiφrßs    ; TIMES NEW ROMAN;12;T;F;
  24. FONT;05; Vev⌡ kiφrßs sor; TIMES NEW ROMAN;11;F;F;
  25. FONT;06; Page Footer sor; TIMES NEW ROMAN;8;F;F;
  26. FONT;07; Dßtum sor      ; TIMES NEW ROMAN;10;F;F;
  27.  
  28. &&UDT Fontok
  29. FONT;10; Group Bold     ; TIMES NEW ROMAN;10;T;F;
  30. FONT;11; Group Standard ; TIMES NEW ROMAN;10;F;F;
  31.  
  32.  
  33. &&--------------------------------
  34. &&Vßltoz≤ deklarßci≤k
  35. &&--------------------------------
  36. VARIABLE;1; N ;SZ┴MLA;
  37. VARIABLE;2; N ;rEVOLUTION Software Studio;
  38. VARIABLE;3; N ;1111 Bp. Kende u. 1.;
  39. VARIABLE;4; N ;Budapest Bank;
  40. VARIABLE;5; N ;Tel.: 185-3355 Fax: (1) 185-3706;
  41. VARIABLE;6; C ;0;
  42. VARIABLE;7; C ;0;
  43. VARIABLE;8; C ;0;
  44. VARIABLE;9; N ;Vev⌡;
  45. VARIABLE;10; N ;Elad≤;
  46. VARIABLE;11; N ;;
  47. VARIABLE;12; N ;;
  48. VARIABLE;13; N ;000-00000;
  49. VARIABLE;14; N ;00000000-00000000-00000000;
  50.  
  51. &&UDT Valtozok
  52.  
  53. &&--------------------------------
  54. &&Stφlus deklarßci≤k
  55. &&--------------------------------
  56. && Szßmla f⌡felirat stφlusa
  57. STYLE;1;<40;>150;
  58.  
  59. && CΘgnΘv Θs cφm stφlusa
  60. STYLE;2;<44;<86;>60;
  61.  
  62. && Vev⌡, Θs adatai stφlusa
  63. STYLE;3;<15;<78;<4;<15;<78;
  64.  
  65. && Szßmla fizetΘsi m≤d stφlusa
  66. STYLE;4;^38;^38;^38;^38;^38;
  67.  
  68. && Szßmla sorok stφlus
  69. STYLE;5;^20;<65;^15;>15;<15;>28;>32;
  70.  
  71. && Szßmla ÷sszegz⌡ rΘsze
  72. STYLE;6;>110;>40;>40;
  73.  
  74. && MegjegyzΘs sorok
  75. STYLE;7;<190;
  76.  
  77. && Alßφrßsok
  78. STYLE;8;^95;^95;
  79.  
  80. && LßblΘc
  81. STYLE;9;<70;^50;>70;
  82.  
  83. && Nagy cΘgnΘv
  84. STYLE;10;<150;
  85.  
  86. && Soronkenti megjegyzesek
  87. STYLE;11;<20;<110;
  88.  
  89. && Nagy cΘgnΘv
  90. STYLE;12;<20;<160;
  91.  
  92.  
  93.  
  94. &&**********************************************
  95. && Szekci≤ definφci≤k
  96. &&**********************************************
  97.  
  98. &&--------------------------------
  99. &&Main section
  100. &&--------------------------------
  101. >SECTION;1;Main;
  102. SPACE;10;
  103. FONT;1;
  104. STYLE;1;
  105. PRINT;|#N1#~;
  106.  
  107. FONT;2;
  108. STYLE;10;
  109. && A sajßt logojßt, emblΘmßjßt kΘszφtse el BMP formßtumban, Θs nevezze ßt logo.bmp-nek,
  110. && majd mßsolja be a SZLA95 k÷nyvtßrba.
  111. && A szßmok bal fels⌡(x1,y1), ill. jobb als≤(x2,y2) koordinßtßkat jel⌡lnek mm-ben.   
  112. && Ammennyiben egyedi szßmlaformßtumra van szⁿksΘge forduljon a forgalmaz≤hoz,
  113. && vagy a rEVOLUTION Software Studio-hoz.
  114. BITMAP;10;10;53;30;LOGO.BMP;
  115. SPACE;2;
  116. UNDERLINE;0;50;
  117. SPACE;8;
  118.  
  119.  
  120. && partner adatainak kiφrßsa
  121. STYLE;3;
  122. SELECT;4;
  123. SPACE;1;
  124. FONT;4;
  125. PRINT;Elad≤:|#N2#||Vev⌡:|$NNEV$~;
  126. FONT;5;
  127. PRINT;|#N3#|||$NISZ$ $NVAROS$, $NUTCA$~;
  128. PRINT;|#N5#|||Tel.: $NTELEFON$ Fax.: $NFAX$~;
  129. PRINT;|Bank: #N4#|||Bank: $NBANKFIOK$~;
  130. PRINT;|Szßmlaszßm: #N14#|||Szßmlaszßm: $NSzamlaszam$~;
  131. PRINT;|Ad≤szßm: #N13#|||Ad≤szßm: $NAdoszam$~;
  132. SPACE;6;
  133.  
  134. && Szßmla sorszßm etc.
  135. SELECT;1;
  136. FONT;5;
  137. STYLE;12;
  138. PRINT;Tßrgy:|$NTARGY$~;
  139. SPACE;2;
  140. STYLE;4;
  141. FONT;10;
  142. UNDERLINE;0;25;
  143. SPACE;2;
  144. PRINT;A fizetΘs m≤dja|TeljesφtΘs|Kelt|FizetΘsi hatßrid⌡|Sorszßm~;
  145. FONT;7;
  146. PRINT;#N12#|$DTELJESITES$|$DKIALLITAS$|$DESEDEKES$|$NFORMATTEDSORSZAM$~;
  147. SPACE;1;
  148. UNDERLINE;0;25;
  149. SPACE;6;
  150.  
  151. && Szßmla sorok fejlΘce
  152. STYLE;5;
  153. FONT;10;
  154. PRINT;ITJ/SZJ|MegnevezΘs|┴FA|Menny.|Egys.|EgysΘgßr|Netto ÷sszesen~;
  155. SPACE;1;
  156. UNDERLINE;0;25;
  157. SPACE;3;
  158.  
  159. && Szßmla sorok nyomtatßsa
  160. SELECT;2;
  161. SPACING;100;
  162.  
  163. && LOOP Ciklus lefuttatßsa
  164. LOOP;-1;4;
  165.  
  166. && Szßmla ÷sszesφt⌡
  167. && GOTO;200;
  168. SPACE;5;
  169. STYLE;6;
  170. UNDERLINE;0;25;
  171. SPACE;5;
  172. SELECT;1;
  173. FONT;10;
  174. PRINT;|Netto ÷sszesen:|#C6# Ft~;
  175.  
  176. && ┴FA felsorolßs
  177. SELECT;3;
  178. FONT;11;
  179. LOOP;-1;5;
  180.  
  181. && Mind÷sszesen
  182. FONT;10;
  183. SELECT;1;
  184. FUNCTION;7;RSVegosszeg + RSVegAFA;
  185. PRINT;|A vΘg÷sszeg:|#C7# Ft~;
  186.  
  187. && Veg÷sszeg sz÷vegesen
  188. STYLE;7;
  189. FONT;11;
  190. SPACE;3;
  191. PRINT;#N11#~;
  192. SPACE;5;
  193. PRINT;$NMEGJEGYZES$~;
  194.  
  195.  
  196. && Alßφrßsok
  197. SPACE;20;
  198. STYLE;8;
  199. PRINT;............................................|............................................~;
  200. PRINT;Elad≤|Vev⌡~;
  201.  
  202.  
  203. &&--------------------------------
  204. &&Page Header Section
  205. &&--------------------------------
  206. >SECTION;2;Page Header;
  207. && Ki kell φrni a feliratokat
  208. FONT;4;
  209.  
  210.  
  211. &&--------------------------------
  212. &&Page Footer Section
  213. &&--------------------------------
  214. >SECTION;3;Page Footer;
  215. FONT;6;
  216. STYLE;9;
  217. PRINT;|#P#. Oldal| ~;
  218. SPACE;1;
  219. PRINT;rEVOLUTIONÖ Szßmla '95 for Windows 1.1||rEVOLUTION Software Studio   Tel.: 185-3355,185-3308~;
  220.  
  221. &&--------------------------------
  222. &&Main-Szamlak
  223. &&--------------------------------
  224. >SECTION;4;Main-Sorok;
  225. FONT;11;
  226. FUNCTION;8;RSEGYSEGAR * RSMENNYISEG;
  227. STYLE;5;
  228. PRINT;$NITJSZJ$|$NNEV$|$LAFA$%|$CMENNYISEG$|$NMEGYSEG$|$CEGYSEGAR$ Ft|#C8# #N20#Ft~;
  229. STYLE;11;
  230. SUPRESS;ON;
  231. PRINT;|$NMegjegyzes$~;
  232. SUPRESS;OFF;
  233. FUNCTION;6;PA6 + PA8;
  234. && SPACE;1;
  235. &&--------------------------------
  236. &&Main-AFA
  237. &&--------------------------------
  238. >SECTION;5;Main-AFA;
  239. PRINT;$LAFAERTEK$ %-os ┴FA alap:|$CSOROSSZEG$ Ft    ┴FA:|$CSORAFAOSSZEG$ Ft~;
  240.  
  241.  
  242. &&**********************************************
  243. && End jelzese
  244. &&**********************************************
  245. >END